Top 10k strings from Motion (1983)(SciCAL Software).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TZX] /

Back to the directory listing

   4 e$="(u+a*t)*t":
   4 ,"time (s)"," "," ":
   3 ;"Initial vel.=";u;" m/s";
   3 ;"Acceleration=";ac;"m/s
   3 ,"10","20","30","40","50":
   2 z=x0+hsf*xcur
   2 xint*hsf*.5
   2 xcur=xcur+xint:
   2 u(xmn,xint):
   2 g$="(y-u)/ac":
   2 f$="u+ac*x":
   2 e$="a*t*t":
   2 MOTION    x
   2 =;" s between dots.";
   2 ;dtint*.02
   2 ;"u=";u;"m/s";
   2 ;"time taken";
   2 ;"a=";ac;"ms
   2 ,"time t (s)","velocity v","(m/s)":
   2 ,"-50","-20","-10"," 10"," 20":
   1 z=y0+vsf*ycur
   1 z;"        "(
   1 z$>"ABCDEFG"(nq)
   1 z$="123456789":
   1 z$; " Correct":
   1 yint=nminc:
   1 yint*vsf*.5
   1 ycur=ycur+yint:
   1 y0=by-ymn*vsf
   1 xmn,xmx,ymn,ymx,lx,by,hsl,vsl,h$,v$,u$
   1 xint=nminc:
   1 x0=lx-xmn*hsf
   1 x,vsf*(100
   1 wdth=wdth+1
   1 w(ymn,yint/2
   1 w(xmn,xint*.5
   1 vsf=vsl/(ymx-ymn):
   1 vert track randomize-ve acc.
   1 vert track randomize for zero acc.
   1 vert track randomize +ve acc.
   1 velocity,time,distance
   1 u(ymx,yint/2
   1 u(ymn,yint):
   1 u(xmx,xint*.5
   1 twdth=wdth*flds*8
   1 tries=tries+1
   1 tl,lc,flds,wdth,ent,t$,b$
   1 tbcx=tbcx+1
   1 q$,c$,nq,lq,cq:
   1 q$,ans,rng
   1 pl,pc;q$;ip;:
   1 nminc+"e"+
   1 ncor=ncor+1
   1 n$=n$+f$(1
   1 m(curln,curmargindx,indx of last entry,1stmargin,2ndmargin,etc.)
   1 lq,cq;q$''
   1 lc=lc+wdth:
   1 lc+(flds*wdth)-1
   1 labelled curve
   1 j$=j$+(s$(
   1 initalisation
   1 inc*ln10th:
   1 i=xinc/hsf
   1 i(by+vsl)+1
   1 ht=-(2.125
   1 hsf=hsl/(xmx-xmn):
   1 horiz track data
   1 help=z$="H"
   1 hat is the acceleration in ms
   1 hat is the acceleration (m/s
   1 gtb;"which is the"'
   1 gtb;"acceleration."
   1 gtb;"       =20ms
   1 g$="(y-u)/ga":
   1 g$="(y-u)/a":
   1 g$="(y-u)/a"
   1 free fall up
   1 free fall qs
   1 free fall down
   1 f$="u+ga*x":
   1 f$="u+a*x":
   1 f$="u+a*(x-6)":
   1 f$="ac*x":
   1 elect the correct velocity-time"'"curve (1-4).";
   1 e$="v+(u+a*t)*t":
   1 e$="a+v*t":
   1 e$="(u+a*t)*t"
   1 dtint=t/nd
   1 draw graph
   1 demonstration
   1 deceleration qs
   1 d$="v-step= 60 m/s":
   1 d$="t-step= 3 s":
   1 d$="distance (m)":
   1 cq;"it is ";c$;
   1 cq;"Answer 
   1 cq;"ABCDEFG"(z);"  ";q$:
   1 composite motion qs
   1 cl rh screen
   1 check answer
   1 another run?
   1 adr=chars+8
   1 acceleration******
   1 acceleration qs
   1 a(ans,ip,rng):
   1 X(t),y0-yd:
   1 What is the value,in seconds,of"'"T1, when the object is highest?";
   1 What is the value of T3,when it"'"is half way up,to the nearest
   1 What is the value of T2 (s),the"'"time when it lands again?";
   1 What is the average velocity,in"'"m/s for the whole trip?";
   1 What is the acceleration in the"'"last second (in ms
   1 W P Q R S T U V W@P@Q@R@S@T@U@V@W`P`Q`R`S`T`U`V`W
   1 VERT MOVE DOWN
   1 TEST SECTION
   1 Quiz master
   1 Please enter your choice 
   1 O H I J K L M N O@H@I@J@K@L@M@N@O`H`I`J`K`L`M`N`O
   1 MOTION    |
   1 MOTION    
   1 How far does it go whilst dec-"'"elerating.";
   1 How far does it go while it is"'"accelerating?";
   1 How far does it go at constant"'"velocity?";
   1 G @ A B C D E F G@@@A@B@C@D@E@F@G`@`A`B`C`D`E`F`G
   1 Free fall track data
   1 FREE FALL section.....4
   1 Created with Ramsoft MakeTZX
   1 =;" secs.";:
   1 =*hsl/(xmx-xmn):
   1 ;"velocity -";
   1 ;"useful to"'
   1 ;"under the";
   1 ;"travelled."
   1 ;"time taken=6*0.5s = 3 s"''"And velocity=distance travelled";
   1 ;"time taken       
   1 ;"time graph"'
   1 ;"time between dots = 1 s":
   1 ;"time between dots = 1 s"
   1 ;"time   ";
   1 ;"the area"'
   1 ;"know that"'
   1 ;"is equal to";
   1 ;"height"(z):
   1 ;"followed by <
   1 ;"distance"'
   1 ;"change in velocity"'
   1 ;"at the same height,";
   1 ;"any other letter for";
   1 ;"a=acceleratn.,u=initial velocity"
   1 ;"a new height."
   1 ;"a height of ";h;" m";
   1 ;"__________________"'
   1 ;"When you want to drop the object";:
   1 ;"When you get the 'press any key'"'"prompt, and respond,you will see"'"an object move along the track."'"    time between dots = 1 s ."
   1 ;"What is the average velocity in"'"m/s in the 2nd second ?"
   1 ;"VELOCITY";
   1 ;"Type height to fall from"''
   1 ;"Type a number & press 
   1 ;"Time between dots =";dtint*.02
   1 ;"The object drops from";
   1 ;"TEST QUESTIONS"'
   1 ;"PROGRAM  OPTIONS";
   1 ;"Number of questions tried ";tries''"Number of correct replies ";ncor
   1 ;"Now select the correct distance-"'"time graph."
   1 ;"MOTION";
   1 ;"MAIN PROGRAM LOADS"
   1 ;"It is also"'
   1 ;"Here is another object; watch itmove.(0
   1 ;"Here is another object; watch it"'"move. One second between dots."
   1 ;"Height (m)=?";h;
   1 ;"Good luck!":
   1 ;"Excellent!!"
   1 ;"Area (m)"
   1 ;"ACCELERATION"'
   1 ;"=150/3 = 50 m/s";
   1 ;"= ";v;" m/s";
   1 ;"********************************";
   1 ;"(50m - 175m)"''
   1 ;" When you want a demonstration,":
   1 ;" To see the velocity time graph,";:
   1 ;" PLEASE WAIT, WHILE THE"''
   1 ;" On the graph you will see three"'"velocity-time curves.What is the"'"acceleration (ms
   1 ;" And this is the velocity - time"'"graph for the run.";
   1 ;"  When you are ready to try for"'"    yourself, press any key.";:
   1 ;"  Objects move across the track"'"which you can see at the top of the  screen. As they move  they"'"print dots at regular time int-"'"ervals to mark their position."
   1 ;"  MOTION  ","   
   1 ;"  Here now are velocity - time"'"graphs for lots of objects."'"  For each one you should try to"'"relate the acceleration and the"'"distance travelled to the grad-"'"ient of the graph and the area"'"under it."
   1 ;"   Time between dots=";dtint*.02
   1 ;"   Press any key to continue.";:
   1 ;"          ";:
   1 ;"                               ";
   1 63634VERT MOVE UP
   1 3..Distance-time
   1 2:\!4!"B\>
   1 2 s between dots.)";
   1 2 s between dots"
   1 1983 Scical Software Ltd
   1 16 September 1983
   1 1-";z$(nch);"
   1 ,pc;(q$);"?";ip;
   1 ,lx+hsl,yax:
   1 ,lx+hsl,yax-16
   1 ,gtb;"gradient=60/3"'
   1 ,dtint*.02
   1 ,(Y1+Y2)*.5
   1 ,(X1+X2)*.5
   1 ,"time t (s)","  velocity v","(m/s)":
   1 ,"t(s)"," v","(m/s)":
   1 ,"t (s)","v","(m/s)":
   1 ,"t (s)"," v","(m/s)":
   1 ,"t (s)"," s","(m)"
   1 ,"Graph 1","Graph 2","Graph 3","Graph 4":
   1 ,"Graph 1","Graph 2","Graph 3","-10":
   1 ,"50m","100m","150m","200m","250m":
   1 ,"5","10","15","20","30":
   1 ,"25m","45m","60m","75m","90m":
   1 ,"2","5","10","15","20":
   1 ,"10","5","-5","-10","-20":
   1 ,"10 km/hr","30 km/hr","48 km/hr","72 km/hr","90 km/hr":
   1 ,"/Time/Velocity/Velocity/","*Step*(m/s)*Change*":
   1 ,".5","1","2","10","20":
   1 ,".25",".5","1","10","20":
   1 ," 25m"," 50m"," 75m","100m","125m":
   1 ," 20"," 50","-10","-20","-50":
   1 ," 10","  5","  1"," -5","-10":
   1 ," "," height","(m)"
   1 +(+ncor/tries)*100
   1 *dtint*.02
   1 *(ymx-ymn)/vsl:
   1 *(xmx-xmn)/hsl:
   1 )=g*hsf+X0:
   1 )=f*vsf+Y0
   1 )="8");" ";p$;"% success rate."
   1 )-m(tbcx)-1
   1 ),m(tbcx);"       "(
   1 ) in each case?"
   1 ((upr/(et*et))-(u/et)):
   1 ((t-c)/c)*100
   1 '';"  ACCELERATION DUE TO GRAVITY"'"  
   1 ''''''''" Please wait a short while for"'"   the prompt to appear and"'"       then press key A."
   1 '''"You will be asked for the height"'"from which you want the body to"'"fall.  You start it falling by"'"pressing any key,  when it will"'"make a beep.It will make another" 
   1 '''"Here are five questions for you"'"to try.Each question has several"'"parts, and they are given to you"'"in sequence."
   1 ''"so the velocity is ";d10;"/";t''
   1 ''"Yes, well done.That is the right answer."''':
   1 ''"Option   
   1 ''"No,that is not the right answer."'''"     Type T to try again."'"     Type H if you want help.";
   1 ''"If you are really keen, you will"'"relate the acceleration  and the"'"initial  velocity values to the"'"distance travelled  and the time"'"taken using the equations in the"'"booklet."
   1 ''"Here is its distance-time graph."
   1 ''" You should be able to count SIXtime steps between 0 m and 150 mon the scale."'" This means that the object cov-ered 150m in the time it took toprint 6 dots."
   1 ''" Calculate the velocity of the"'" object using the dots and the"'" scale.";
   1 ''"  For uniform acceleration, the"'"graph is a straight line with a"'"constant gradient."
   1 '"or in other words acceleration !";
   1 '"You reply by typing the letter"'"corresponding to the answer that"'"you think is correct."
   1 '"Which is a";"n"
   1 '"In TEN time steps the distance"'"     travelled is ";d10;" m"''"the time taken is  ";t;" s"
   1 '"Each question asks for an answer"'"by printing a list of possibil-"'"ities labelled with the letters"'"A,B,C, etc."
   1 '" change in velocity = 20 =20m/s
   1 '" With the dots and the scale youcan find the object's  velocity"'"by counting dots and measuring"'"distances."
   1 '" So, distance travelled=150m"'
   1 '" In this section you can measure"'"the acceleration of free fall by"'"dropping  bodies from different"'"heights and timing their descent"'"with a stopwatch." 
   1 '"  See the booklet on how to pro-"'"cess your results."''"  Don't forget the stopwatch!"
   1 '"  If an object gathers speed it"'"is said to accelerate."'"  The distance travelled in each"'"time interval changes and so the"'"distance between dots changes."
   1 '"   An object released from rest"'"above the surface of the earth"'"will fall, and as it does so it"'"accelerates. The acceleration is"
   1 '"     Positive acceleration"'"     Negative acceleration"'"     Zero acceleration."
   1 "velocity (m/s)=",v,5
   1 "the same for all objects, if the"'"resistance to motion,for example"'"wind pressure, is negligible."
   1 "s=distance at time t, v=velocity";#1
   1 "increased."'"  Measure the velocity in each"'"time step by dividing distance"'"by time and check the table."
   1 "iii Negative acceleration.The"'"    graph curves downwards, &"'"    the equation of motion is"'"            
   1 "first","10","","second","30","20","third","50","20","fourth","70","20","fifth","90","20"
   1 "beep when it hits the ""ground""."''"  Repeat readings at least three"'"times for each height, and take"'"measurements for at least five"'"different heights."
   1 "What is the average velocity in"'"the third second ?"
   1 "Very good indeed!":
   1 "This acceleration of 20 ms
   1 "There are three types of curve:"
   1 "The gradient of such a graph is";
   1 "Pretty good. You're obviously"'"getting the hang of this.":
   1 "O.K. but I think you need a bit more practice.":
   1 "Now the main program loads in:"'"It will save itself automatic-"'"ally in an """"as sold"""" form."
   1 "Now the data bytes are saved"'"onto your master tape."
   1 "Not too bad, but why not try a"'"few more questions?":
   1 "No,in fact"'
   1 "Next this BASIC header is saved"'"so it runs from line 20."
   1 "Moderate, but room for improvem-"'"ent?":
   1 "In the 2nd second, the average"'"velocity was 30 m/s, and in the"'"third second it was 50 m/s."'"
   1 "Hello Spool. First some bytes of"'"data are loaded."
   1 "Graph 3","D",5
   1 "Graph 2","B",5
   1 "Graph 1","A",5
   1 "'''"Question 1 Velocity-time curves"''"Question 2 Acceleration"''"Question 3 Deceleration"''"Question 4 Motion under gravity"''"Question 5 Composite motion"
   1 "'"where v is the velocity at time"'"t,u is the initial velocity and"'"a is the acceleration."; 
   1 " ii Zero acceleration,or cons-"'"    tant velocity. The graph"'"    is a straight line,  and"'"    the equation of motion is"'"              
   1 " VELOCITY is defined as the rate"'"of change of distance with time."'"ie distance travelled divided by"'"time taken.";
   1 " Bullseye! Very good indeed!"
   1 " An object is thrown up from the"'"ground.It reaches a height of 5m"'"before falling back. Assume acc-"'"eleration due to gravity=10ms
   1 " 1 s between dots."''"  Acceleration is defined as the"'"velocity  CHANGE  divided by the"'"time for the change.The acceler-"'"ation of our object is"
   1 "  i Positive acceleration.The"'"    graph curves upwards, and"'"    the equation of motion is"'"            
   1 "  This means that the S.I. unitsof acceleration are (m/s)/s moreusually written as ms
   1 "  These graphs can take various"'"shapes according to the acceler-"'"ation,  and the velocity of the"'"object when it enters the track."
   1 "  The equation of the line is"'
   1 "  Distance-time graphs are now"'"   shown for the three cases" 
   1 "  Acceleration is defined as the"'"rate of change of velocity with"'"time. In other words the change"'"in velocity divided by the time"'"taken to make that change."
   1 "  A  graph  of velocity plotted"'"against time provides a clearer"'"picture of what happens when an"'"object accelerates."
   1 "   That was an object starting"'"from rest and  accelerating  up"'"the track.Every second it made a"'"dot but because it was speeding"'"up the distance between the dots";  
   1 "   In addition to velocity-time"'"graphs,distance-time graphs can"'"be drawn."
   1 "     Type A for another run,"'"     R to return to the menu.";
   1  to repeat run";
   1  is"'"equivalent to a velocity change"'"in one second of......"
   1  for the question menu."
   1  for the next question."''"Type 
   1  for menu";:
   1  another run : 
   1  What is the velocity, in m/s"'" when it hits the ground again?";
   1  What is the launch velocity in"'"m/s ?";
   1  Velocity,time and distance."
   1  Test questions."
   1  Return to main menu"
   1  Press any key.
   1  Distance time graphs."
   1  Acceleration, and velocity-     time graphs.";
   1  Acceleration of free-fall."
   1  1983 SciCAL Software Ltd.";
   1  1983 SciCAL Software Ltd.  ";"********************************"
   1  1983 SciCAL Software Ltd.